(org-columns-uncompile-format): Avoid assignment to free variable `fun'.

diff --git a/lisp/org/org-colview.el b/lisp/org/org-colview.el
index 73e6bed121a977e48700362094b15a06f41d45d4..42863b68b38df0f21fdffd567b4d47ea08303954 100644 (file)
--- a/lisp/org/org-colview.el
+++ b/lisp/org/org-colview.el
@@ -1015,7 +1015,7 @@ Don't set this, this is meant for dynamic scoping.")
 
 (defun org-columns-uncompile-format (cfmt)
   "Turn the compiled columns format back into a string representation."
-  (let ((rtn "") e s prop title op op-match width fmt printf)
+  (let ((rtn "") e s prop title op op-match width fmt printf fun)
     (while (setq e (pop cfmt))
       (setq prop (car e)
            title (nth 1 e)